object Form33: TForm33 Left = 396 Top = 226 AutoSize = True BorderStyle = bsNone Caption = 'Emlak Listesi' ClientHeight = 250 ClientWidth = 350 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Image1: TImage Left = 0 Top = 0 Width = 350 Height = 250 AutoSize = True Picture.Data = {} OnMouseDown = Image1MouseDown end object Label1: TLabel Left = 64 Top = 176 Width = 57 Height = 13 AutoSize = False Caption = 'Semt Ad�' Transparent = True end object Image2: TImage Left = 47 Top = 195 Width = 105 Height = 38 Picture.Data = {} Stretch = True Visible = False end object Label2: TLabel Left = 48 Top = 208 Width = 97 Height = 25 Alignment = taCenter AutoSize = False Caption = 'Bul' Font.Charset = DEFAULT_CHARSET Font.Color = clLime Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True OnMouseDown = Label2MouseDown OnMouseUp = Label2MouseUp end object Image3: TImage Left = 204 Top = 195 Width = 105 Height = 38 Picture.Data = {} Stretch = True Visible = False end object Label3: TLabel Left = 208 Top = 208 Width = 97 Height = 25 Alignment = taCenter AutoSize = False Caption = '��k��' Font.Charset = DEFAULT_CHARSET Font.Color = clLime Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True OnMouseDown = Label3MouseDown OnMouseUp = Label3MouseUp end object SpeedButton1: TSpeedButton Left = 248 Top = 168 Width = 41 Height = 21 Caption = 'T�m�' OnClick = SpeedButton1Click end object Edit1: TEdit Left = 120 Top = 168 Width = 121 Height = 21 TabOrder = 0 end object DBGrid1: TDBGrid Left = 64 Top = 48 Width = 225 Height = 113 DataSource = DataSource1 TabOrder = 1 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] OnDblClick = DBGrid1DblClick Columns = < item Expanded = False FieldName = 'No' Visible = True end item Expanded = False FieldName = 'EmlakTipi' Width = 130 Visible = True end> end object DataSource1: TDataSource DataSet = Query1 Left = 16 Top = 8 end object Query1: TQuery Active = True SQL.Strings = ( 'select * from emlaktanimlama') Left = 48 Top = 8 object Query1No: TIntegerField FieldName = 'No' end object Query1Aklama: TMemoField FieldName = 'A��klama' BlobType = ftMemo Size = 100 end object Query1EmlakTipi: TStringField FieldName = 'EmlakTipi' end end end